home *** CD-ROM | disk | FTP | other *** search
/ The Glitch Apple Disk Collection / 2014.glitch.apple.collection.zip / indexed / MASKSUNB.DSK / ROOM 25.0.txt < prev    next >
Text File  |  2014-09-09  |  2KB  |  162 lines
  1. .S F=N
  2. .S N=25
  3. .L L,GEO+STRS
  4. .!DRAW
  5. .!CLRT
  6. .!LOOK
  7. .$ P
  8. .!HERE
  9. !LOOK
  10. LOOK WEBS 
  11. .!CLRT
  12. .I N0(25):0
  13. .T P "The room is completely filled with
  14. .T P "giant spider webs. The tough strands
  15. .T P "prevent your entry.
  16. .E P "You are in a room with chopped up
  17. .E P "webs and other debris on the floor.
  18. %LOEN
  19. .P "The door is closed. It has a familiar
  20. .P "looking plate and keyhole.
  21. SEARCFLOOR
  22. .!CLRT
  23. .!WEBS
  24. .T J -3
  25. .I N1(25):0
  26. .T P "You get a silver key from under the
  27. .T P "chopped webs.
  28. .T S N1(25)=1
  29. .T S TC(21)=0
  30. .E P "You find nothing.
  31. SEARC
  32. .!CLRT
  33. .!WEBS
  34. .T J -3
  35. .I NV(25):1
  36. .T J +14
  37. .S NV(25)=1
  38. .P "After searching for a while you find
  39. .P "nothing but a large vicious green
  40. .P "man-eating spider!!!
  41. .!WAIT
  42. .I E
  43. .T J +5
  44. .S SV(4)=100
  45. .S SV(7)=60
  46. .S SV(6)=60
  47. .N N
  48. .!MORE
  49. .P "No, no, I'm just kidding.
  50. .P "You find nothing unusual.
  51. %USKY
  52. %OPEN
  53. %OPLK
  54. .!WEBS
  55. .T J -2
  56. .I L:0
  57. .T P "You must specify which key to use.
  58. .T J -5
  59. .P "The key doesn't work in this lock.
  60. %FW..
  61. .!WEBS
  62. .T J -2
  63. .P "You continue forward.
  64. .I F:24
  65. .T !DRTS
  66. .E !GUNO
  67. %BK..
  68. .P "You turn around and go back.
  69. .I F:24
  70. .T !GUNO
  71. .E !DRTS
  72. %L...
  73. .!WEBS
  74. .T J -2
  75. .I F:24
  76. .T !INVD
  77. .E !DOOR
  78. %R...
  79. .!WEBS
  80. .T J -2
  81. .I F:24
  82. .T !DOOR
  83. .E !INVD
  84. !DOOR
  85. %..EN
  86. .!WEBS
  87. .T J -2
  88. .P "The door is locked tight. You can't get it open.
  89. !GUNO
  90. .S GE(6)=10
  91. .3 ROOM 24.1 
  92. .!TUNL
  93. !DRTS
  94. .S GE(6)=20
  95. .3 ROOM 27.0 
  96. .!TUNL
  97. !WEBS
  98. .I N0(25):0
  99. .T P "You can't get through the webs.
  100. BREAKWEBS 
  101. DESTRWEBS 
  102. CUT  WEBS 
  103. REMOVWEBS 
  104. CLEARWEBS 
  105. .!CLRT
  106. .I N0(25):1
  107. .T P "The webs have all been removed.
  108. .T J -4
  109. .P "Raoul begins to remove the webs with
  110. .P "his machete. ;
  111. .S B=0
  112. .P ". ;
  113. .!WAIT
  114. .!SLIC
  115. .!WAIT
  116. .!SLIC
  117. .S B=B++
  118. .I B<6
  119. .T J -7
  120. .S N0(25)=1
  121. .!DRAW
  122. .!CLRT
  123. .P "Raoul begins to remove the webs with
  124. .P "his machete. . . . . . . Whew!
  125. .P "That took a while.
  126. .$ P
  127. !SLIC
  128. .I E
  129. .T J -2
  130. .S SV(4)=0
  131. .S SV(6)=1
  132. .S SV(7)=130
  133. .N N
  134. !DRAW
  135. .S P=3-P
  136. .C 1,P,0
  137. .B DOORL
  138. .S V=P
  139. .I F:27
  140. .T D 
  141. .B GEORM
  142. .S V=P
  143. .D 
  144. .B DOORR
  145. .S V=P
  146. .I F:24
  147. .T D 
  148. .B RTWAL
  149. .S V=P
  150. .D 
  151. .I N0(25):0
  152. .T B WEBOV
  153. .E B BATSH
  154. .S V=P
  155. .D 
  156. .E S X=2
  157. .E S Y=1
  158. .S V=P
  159. .E D 
  160. ._ P
  161. @@@@@
  162.